home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2004 #2 / Amiga Plus CD - 2004 - No. 02.iso / AmiSoft / Misc / emu / Wzonka-Lad.lha / Wzonka-Lad / Wzonka-Lad Install < prev    next >
Text File  |  2004-01-02  |  9KB  |  438 lines
  1. ; $VER: Wzonka-Lad Installer Script 1.01.00 (14-Aug-99)
  2. ; Installer made by Lennart Johannesson
  3. ; Modified by Ville Helin
  4. ; Later modified by Ventzislav Tzvetkov
  5. ; For comments, bugs (yes, I know there's still a lot of them)
  6. ; suggestions etc. write to: 95lenjo@ostrabo.uddevalla.se
  7.  
  8.  
  9. ;Ask where to place the Wzonka-Lad directory
  10.  
  11. (message "\nWelcome to Wzonka-Lad Installer!\n-----------------------\n\nThis program will install\n Wzonka-Lad 1.03.00\n on your Amiga\n\n (c) Ville Helin 1996-2003\n\nModifications by\nVentzislav Tzvetkov 2003-2004\ndrHirudo@Amigascne.org")
  12.  
  13. (welcome)
  14.  
  15. (complete 0)
  16.  
  17. (set @default-dest 
  18.     (askdir (prompt "Where would you like me to create the\n\"Wzonka-Lad\" directory?")
  19.     (help @askdir-help)
  20.     (default "Ram:")
  21.     (newpath)
  22.     )
  23. )
  24.  
  25. ;Create Wzonka-Lad directory
  26.  
  27. (complete 6)
  28.  
  29. (set target
  30.     (tackon @default-dest (cat "Wzonka-Lad")))
  31.  
  32. (makedir target
  33.      (prompt "Creating directory:\n\""target"\"")
  34.     (help @makedir-help)
  35. )
  36.  
  37. (copyfiles
  38.     (dest @default-dest)
  39.     (source "release/icons/install/Wzonka-Lad.info")
  40.     (files))
  41.  
  42. (set @default-dest (target))
  43.  
  44. ;Install the executables
  45.  
  46. (complete 12)
  47.  
  48. (copyfiles
  49.     (prompt "Where would you like me to put the executables?")
  50.     (help @askoptions-help)
  51.     (source "release/binaries/")
  52.     (dest @default-dest)
  53.     (confirm)
  54.     (files)
  55.     (infos)
  56.     (choices "Wzonka-Lad FULL" "Wzonka-Lad FAST" "Wzonka-Lad WARP" "Palette Editor")
  57. )
  58.  
  59. (set @default-dest (target))
  60.  
  61. ;Install the documents
  62.  
  63. (complete 18)
  64.  
  65. (copyfiles
  66.     (prompt "Would you like to install the documents?")
  67.     (help @copyfiles-help)
  68.     (source "release/Wzonka-Lad Guide")
  69.     (dest @default-dest)
  70.     (confirm)
  71.     (files)
  72.     (infos)
  73. )
  74.  
  75. (copyfiles
  76.     (dest @default-dest)
  77.     (source "release/icons/install/Wzonka-Lad Guide.info")
  78.     (files)
  79. )
  80.  
  81. ;Install controlpad.library
  82.  
  83. (complete 24)
  84.  
  85. (set @default-dest "LIBS:")
  86.  
  87. (if (exists "LIBS:controlpad.library" (noreq))
  88.     (if (< (/ (getversion "LIBS:controlpad.library") 65536) (/ (getversion "libs/controlpad.library") 65536))
  89.         (copylib
  90.             (prompt "Install controlpad.library?\n(Required for Sega Joypad!)")
  91.             (help @copylib-help)
  92.             (source "release/libs/controlpad.library")
  93.             (dest @default-dest)
  94.             (confirm)
  95.         )
  96.     ) ; else
  97.         (copylib
  98.             (prompt "Install controlpad.library?\n(Required for Sega Joypad!)")
  99.             (help @copylib-help)
  100.             (source "release/libs/controlpad.library")
  101.             (dest @default-dest)
  102.             (confirm)
  103.     )
  104. )
  105.  
  106. ;Install the fonts
  107.  
  108. (complete 30)
  109.  
  110. (set @default-dest "FONTS:")
  111.  
  112. (copyfiles
  113.     (prompt "And the fonts...\nWhere do I put them?")
  114.     (help @copyfiles-help)
  115.     (source "release/fonts/")
  116.     (dest @default-dest)
  117.     (all)
  118.     (confirm)
  119. )
  120.  
  121. ;Install the sample ROM file(s)
  122.  
  123. (complete 36)
  124.  
  125. (set @default-dest (target))
  126.  
  127. (set @default-dest
  128. (askdir    (prompt "Where would you like to store your ROM files?\n(A drawer called \"cartridges\" will be made!)")
  129.     (help @askdir-help)
  130.     (default @default-dest)
  131.     (newpath)
  132.     )
  133. )
  134.  
  135. (set @default-dest
  136.     (tackon @default-dest (cat "cartridges")))
  137.  
  138. (makedir @default-dest
  139.     (prompt "Creating directory...")
  140.     (help @makedir-help)
  141. )
  142.  
  143. (copyfiles
  144.     (prompt "Install the sample ROM file(s) to:\n")
  145.     (help @copyfiles-help)
  146.     (source "release/cartridges")
  147.     (dest @default-dest)
  148.     (confirm)
  149.     (all)
  150. )
  151.  
  152. ;Install the sample battery ram(s)
  153.  
  154. (complete 42)
  155.  
  156. (set @default-dest (target))
  157.  
  158. (set @default-dest
  159. (askdir    (prompt "Where would you like to store your battery ram files?\n(A drawer called \"battery_rams\" will be made!)")
  160.     (help @askdir-help)
  161.     (default @default-dest)
  162.     (newpath)
  163.     )
  164. )
  165.  
  166. (set @default-dest
  167.     (tackon @default-dest (cat "battery_rams")))
  168.  
  169. (makedir @default-dest
  170.     (prompt "Creating directory...")
  171.     (help @makedir-help)
  172. )
  173.  
  174. (copyfiles
  175.     (prompt "Install the sample battery ram file(s) to:\n")
  176.     (help @copyfiles-help)
  177.     (source "release/battery_rams")
  178.     (dest @default-dest)
  179.     (confirm)
  180.     (all)
  181. )
  182.  
  183. ;Install the sample prefs
  184.  
  185. (complete 48)
  186.  
  187. (set @default-dest (target))
  188.  
  189. (set @default-dest
  190. (askdir    (prompt "And your cartridges prefs files?\n(A drawer called \"prefs\" will be made!)")
  191.     (help @askdir-help)
  192.     (default @default-dest)
  193.     (newpath)
  194.     )
  195. )
  196.  
  197. (set @default-dest
  198.     (tackon @default-dest (cat "prefs")))
  199.  
  200. (makedir @default-dest
  201.     (prompt "Creating directory...")
  202.     (help @makedir-help)
  203. )
  204.  
  205. (copyfiles
  206.     (prompt "Install the sample prefs-file to:\n")
  207.     (help @copyfiles-help)
  208.     (source "release/prefs")
  209.     (dest @default-dest)
  210.     (confirm)
  211.     (all)
  212. )
  213.  
  214. ;Install the sample iff
  215.  
  216. (complete 54)
  217.  
  218. (set @default-dest (target))
  219.  
  220. (set @default-dest
  221. (askdir    (prompt "Where would you like to store the example iff picture?\n(A drawer called \"iff\" will be made!)")
  222.     (help @askdir-help)
  223.     (default @default-dest)
  224.     (newpath)
  225.     )
  226. )
  227.  
  228. (set @default-dest
  229.     (tackon @default-dest (cat "iff")))
  230.  
  231. (makedir @default-dest
  232.     (prompt "Creating directory...")
  233.     (help @makedir-help)
  234. )
  235.  
  236. (copyfiles
  237.     (prompt "Install the example iff to:\n")
  238.     (help @copyfiles-help)
  239.     (source "release/iff")
  240.     (dest @default-dest)
  241.     (confirm)
  242.     (all)
  243. )
  244.  
  245. ;Install the sample vgb colour files
  246.  
  247. (complete 60)
  248.  
  249. (set @default-dest (target))
  250.  
  251. (set @default-dest
  252. (askdir    (prompt "And the VGB (tm) example colour files?\n(A drawer called \"vgb_colour_schemes\" will be made!)")
  253.     (help @askdir-help)
  254.     (default @default-dest)
  255.     (newpath)
  256.     )
  257. )
  258.  
  259. (set @default-dest
  260.     (tackon @default-dest (cat "vgb_colour_schemes")))
  261.  
  262. (makedir @default-dest
  263.     (prompt "Creating directory...")
  264.     (help @makedir-help)
  265. )
  266.  
  267. (copyfiles
  268.     (prompt "Install the VGB (tm) example colour files to:\n")
  269.     (help @copyfiles-help)
  270.     (source "release/vgb_colour_schemes")
  271.     (dest @default-dest)
  272.     (confirm)
  273.     (all)
  274. )
  275.  
  276. ;Install the extra Icons
  277.  
  278. (complete 66)
  279.  
  280. (set @default-dest (target))
  281.  
  282. (set @default-dest
  283. (askdir    (prompt "Where do you want the extra icons?\n(A drawer called \"icons\" will be made!)")
  284.     (help @askdir-help)
  285.     (default @default-dest)
  286.     (newpath)
  287.         )
  288.     )
  289.  
  290. (set @default-dest
  291.     (tackon @default-dest (cat "icons")))
  292.  
  293. (makedir @default-dest
  294.     (prompt "Creating directory...")
  295.     (help @makedir-help)
  296. )
  297.  
  298. (copyfiles
  299.     (prompt "Install the extra icons to:\n")
  300.     (help @copyfiles-help)
  301.     (source "release/icons")
  302.     (dest @default-dest)
  303.     (confirm)
  304.     (all)
  305. )
  306.  
  307. ;Install the tools directory
  308.  
  309. (complete 72)
  310.  
  311. (set @default-dest (target))
  312.  
  313. (set @default-dest
  314. (askdir    (prompt "Where do you want the extra tools?\n(A drawer called \"tools\" will be made!)")
  315.     (help @askdir-help)
  316.     (default @default-dest)
  317.     (newpath)
  318.     )
  319. )
  320.  
  321. (set @default-dest
  322.     (tackon @default-dest (cat "tools")))
  323.  
  324. (makedir @default-dest
  325.     (prompt "Creating directory...")
  326.     (help @makedir-help)
  327. )
  328.  
  329. (copyfiles
  330.     (prompt "Install the extra tools to:\n")
  331.     (help @copyfiles-help)
  332.     (source "release/tools")
  333.     (dest @default-dest)
  334.     (confirm)
  335.     (all)
  336. )
  337.  
  338. ;Install the gbs directory and an example gbs file
  339.  
  340. (complete 78)
  341.  
  342. (set @default-dest (target))
  343.  
  344. (set @default-dest
  345. (askdir    (prompt "And the gbs directory?\n(A drawer called \"gbs\" will be made!)")
  346.     (help @askdir-help)
  347.     (default @default-dest)
  348.     (newpath)
  349.     )
  350. )
  351.  
  352. (set @default-dest
  353.     (tackon @default-dest (cat "gbs")))
  354.  
  355. (makedir @default-dest
  356.     (prompt "Creating directory...")
  357.     (help @makedir-help)
  358. )
  359.  
  360. (copyfiles
  361.     (prompt "Install an gbs example file to:\n")
  362.     (help @copyfiles-help)
  363.     (source "release/gbs")
  364.     (dest @default-dest)
  365.     (confirm)
  366.     (all)
  367. )
  368.  
  369. ;Install the favourites directory and the favourite list
  370.  
  371. (complete 84)
  372.  
  373. (set @default-dest (target))
  374.  
  375. (set @default-dest
  376. (askdir    (prompt "And the favourites directory?\n(A drawer called \"favourites\" will be made!)")
  377.     (help @askdir-help)
  378.     (default @default-dest)
  379.     (newpath)
  380.     )
  381. )
  382.  
  383. (set @default-dest
  384.     (tackon @default-dest (cat "favourites")))
  385.  
  386. (makedir @default-dest
  387.     (prompt "Creating directory...")
  388.     (help @makedir-help)
  389. )
  390.  
  391. (copyfiles
  392.     (prompt "Install an favourite.list example to:\n")
  393.     (help @copyfiles-help)
  394.     (source "release/favourites")
  395.     (dest @default-dest)
  396.     (confirm)
  397.     (all)
  398. )
  399.  
  400. ;Install the game_genie directory and the game_genie list
  401.  
  402. (complete 90)
  403.  
  404. (set @default-dest (target))
  405.  
  406. (set @default-dest
  407. (askdir    (prompt "And the GameGenie directory?\n(A drawer called \"game_genie\" will be made!)")
  408.     (help @askdir-help)
  409.     (default @default-dest)
  410.     (newpath)
  411.     )
  412. )
  413.  
  414. (set @default-dest
  415.     (tackon @default-dest (cat "game_genie")))
  416.  
  417. (makedir @default-dest
  418.     (prompt "Creating directory...")
  419.     (help @makedir-help)
  420. )
  421.  
  422. (copyfiles
  423.     (prompt "Install an game_genie.list example to:\n")
  424.     (help @copyfiles-help)
  425.     (source "release/game_genie")
  426.     (dest @default-dest)
  427.     (confirm)
  428.     (all)
  429. )
  430.  
  431. ;Write out some copyright stuff
  432.  
  433. (complete 100)
  434.  
  435. (set @default-dest (target))
  436.  
  437. (message "\nEnjoy your Gameboy (tm) emulator!\n\n(c) Ville Helin 1996-2003\nvhelin@cc.hut.fi\n\nVentzislav Tzvetkov 2003-2004\n\ndrHirudo@Amigascne.org\n\nFor comments about the installer mail to:\nLennart Johannesson\n95lenjo@ostrabo.uddevalla.se")
  438.